function answer = callerSerieSn()
 
    ant = 0;
    actual = 1.0;
    n = 1;
    while(actual - ant  > 0.001) % si ponemos como margen de error 0.001 da un error en tiempo de ejecucion.
				  % "max_recursion_depth exceeded".Debido a que la version recursiva no es eficiente
				  % ya  que desborda el limite del stack. Por lo tanto se debe usar version iterativa 
  
        ant = actual;		  
        n++;
        actual = serieSn (n);
    endwhile
    answer =  n;

endfunction
